Chip 2004 July/Chip_2004-07_cd1.bin/software/poco/setup.exe/{app}/Poco.exe/0/RCDATA/TFRMMAIN/TFRMMAIN.txt

Text File | 2004-05-18 | 13.2 KB | 591 lines

object FrmMain: TFrmMain
  Left = 377
  Top = 320
  VertScrollBar.ParentColor = False
  BorderIcons = []
  BorderStyle = bsNone
  ClientHeight = 387
  ClientWidth = 583
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -17
  Font.Name = 'Arial'
  Font.Style = []
  KeyPreview = True
  OldCreateOrder = True
  Position = poDefault
  Scaled = False
  OnClose = FormClose
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  PixelsPerInch = 120
  TextHeight = 19
  object FileMissingIcon: TImage
    Left = 140
    Top = 44
    Width = 37
    Height = 37
    Picture.Data = {<image000.ico>}
    Visible = False
  end
  object IconEncoded: TImage
    Left = 90
    Top = 42
    Width = 32
    Height = 32
    AutoSize = True
    Picture.Data = {<image001.ico>}
    Visible = False
  end
  object StatusBar1: TStatusBar
    Left = 0
    Top = 364
    Width = 583
    Height = 23
    Panels = <
      item
        Bevel = pbNone
        Width = 280
      end
      item
        Bevel = pbNone
        Style = psOwnerDraw
        Width = 90
      end
      item
        Width = 200
      end
      item
        Width = 20
      end>
    ParentColor = True
    PopupMenu = PopupProgress
    SimplePanel = False
    SizeGrip = False
    OnDrawPanel = StatusBar1DrawPanel
  end
  object PnlPrivacy: TPanel
    Left = 0
    Top = 340
    Width = 583
    Height = 24
    Align = alBottom
    ParentColor = True
    TabOrder = 1
    object PnlPrivacyTitle: TPanel
      Left = 1
      Top = 1
      Width = 581
      Height = 21
      Align = alTop
      BevelInner = bvRaised
      BevelOuter = bvLowered
      ParentColor = True
      PopupMenu = PopupPrivacy
      TabOrder = 0
      OnClick = PnlPrivacyTitleClick
      object LblPrivacy: TLabel
        Left = 6
        Top = 3
        Width = 78
        Height = 15
        Caption = 'Privacy Sheet'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = 15
        Font.Name = 'Arial'
        Font.Style = [fsBold]
        ParentFont = False
        PopupMenu = PopupPrivacy
        OnClick = PnlPrivacyTitleClick
      end
    end
  end
  object MailMessage: TmsMessage
    ContentType = 'text/plain'
    Version = '2.02'
    ReturnReceipt = False
    Left = 247
    Top = 208
  end
  object StatusImages: TImageList
    Left = 254
    Top = 85
  end
  object TrayIcon: TTrayIcon
    Active = False
    ShowDesigning = False
    Icon.Data = {<image002.ico>}
    OnClick = TrayIconClick
    OnDblClick = TrayIconDblClick
    PopupMenu = PopupApp
    Left = 256
    Top = 116
  end
  object PopupApp: TPopupMenu
    AutoHotkeys = maManual
    OnPopup = PopupAppPopup
    Left = 125
    Top = 121
    object HideApplication1: TMenuItem
      Caption = '&Hide Application'
      Default = True
      OnClick = HideApplication1Click
    end
    object N16: TMenuItem
      Caption = '-'
    end
    object NewMessage2: TMenuItem
      Caption = 'New &Message...'
      OnClick = NewMessage
    end
    object CheckMail1: TMenuItem
      Caption = '&Check Mail'
      OnClick = CheckMail1Click
    end
    object ViewMessagesonServer2: TMenuItem
      Caption = '&View Mail on Server...'
      OnClick = ViewMessagesonServer1Click
    end
    object MenuItem6: TMenuItem
      Caption = '-'
    end
    object AddressBook4: TMenuItem
      Caption = 'Address &Book...'
      OnClick = Addressbook1Click
    end
    object AccountsSetup1: TMenuItem
      Caption = '&Accounts Setup...'
      OnClick = Accounts1Click
    end
    object ProgramSettings1: TMenuItem
      Caption = '&Options...'
      OnClick = Programpreferences1Click
    end
    object FiltersandScripts2: TMenuItem
      Caption = '&Filters...'
      OnClick = ShowScripts
    end
    object N17: TMenuItem
      Caption = '-'
    end
    object ExitProgram1: TMenuItem
      Caption = 'E&xit Program'
      OnClick = Exit1Click
    end
  end
  object PopupPrivacy: TPopupMenu
    Left = 93
    Top = 121
    object ActivatePrivacySheet1: TMenuItem
      Caption = '&Activate Privacy Sheet'
      Default = True
      ShortCut = 123
      OnClick = PnlPrivacyTitleClick
    end
    object DisablePrivacySheet1: TMenuItem
      Caption = '&Hide Privacy Sheet'
      OnClick = DisablePrivacySheet1Click
    end
  end
  object PopupProgress: TPopupMenu
    Left = 60
    Top = 121
    object PauseProcess: TMenuItem
      Caption = '&Pause'
      Enabled = False
      Visible = False
    end
    object ContinueProcess: TMenuItem
      Caption = 'C&ontinue'
      Enabled = False
      Visible = False
    end
    object CancelProcess: TMenuItem
      Caption = '&Cancel'
      Enabled = False
      OnClick = StopAllTasks
    end
    object DisconnectModem1: TMenuItem
      Caption = '&Disconnect Modem'
      Visible = False
      OnClick = DisconnectModem1Click
    end
    object N13: TMenuItem
      Caption = '-'
    end
    object Viewprogressmessages: TMenuItem
      Caption = '&View progress messages...'
      OnClick = ViewprogressmessagesClick
    end
  end
  object TimerAnim: TTimer
    Interval = 200
    Left = 284
    Top = 146
  end
  object MailMessage2: TmsMessage
    ContentType = 'text/plain'
    Version = '2.02'
    ReturnReceipt = False
    Left = 278
    Top = 208
  end
  object WebFileInfo: TWebFileInfo
    CurrentVersion = '3.10 Build 1880'
    HomeURL = 'http://www.pocomail.com/index.html'
    InfoTags.AuthorTag = 'poco3author'
    InfoTags.DateTag = 'poco3date'
    InfoTags.DownloadTag = 'poco3download'
    InfoTags.ProductNameTag = 'poco3name'
    InfoTags.ReadMeTag = 'poco3readme'
    InfoTags.VersionTag = 'poco3version'
    Options = [wfioDisplayUI, wfioDisplayReadMe, wfioRunUpdate, wfioExitDuringUpdate]
    UIFont.Charset = DEFAULT_CHARSET
    UIFont.Color = clWindowText
    UIFont.Height = -17
    UIFont.Name = 'Arial'
    UIFont.Style = []
    VersionFormat = wfivSimpleString
    Left = 426
    Top = 74
  end
  object DlgImportCSV: TOpenDialog
    DefaultExt = 'csv'
    Filter = 'CSV Files (*.CSV)|*.CSV|All Files|*.*'
    Title = 'Import CSV address book...'
    Left = 514
    Top = 18
  end
  object DlgExportCSV: TSaveDialog
    OnShow = DlgExportCSVShow
    DefaultExt = 'csv'
    FileName = 'address.csv'
    Filter = 'CSV Files (*.csv)|*.CSV|All Files|*.*'
    Options = [ofOverwritePrompt, ofHideReadOnly, ofEnableSizing]
    Title = 'Export CSV address book...'
    Left = 550
    Top = 18
  end
  object DlgImportLDIF: TOpenDialog
    DefaultExt = 'ldif'
    Filter = 'LDIF Files (*.LDIF)|*.LDIF|All Files|*.*'
    Title = 'Import LDIF address book...'
    Left = 514
    Top = 48
  end
  object DlgExportLDIF: TSaveDialog
    OnShow = DlgExportLDIFShow
    DefaultExt = 'ldif'
    FileName = 'address.ldif'
    Filter = 'LDIF Files (*.ldif)|*.LDIF|All Files|*.*'
    Options = [ofOverwritePrompt, ofHideReadOnly, ofEnableSizing]
    Title = 'Export LDIF address book...'
    Left = 550
    Top = 48
  end
  object DlgSaveMailbox: TSaveDialog
    DefaultExt = 'mbx'
    FileName = 'Imported.mbx'
    Filter = 'Poco Mailbox (*.mbx)|*.MBX|All Files|*.*'
    Options = [ofOverwritePrompt, ofHideReadOnly, ofEnableSizing]
    Title = 'Choose a name for the new mailbox...'
    Left = 484
    Top = 92
  end
  object DlgExportNetscape: TSaveDialog
    OnShow = DlgExportNetscapeShow
    FileName = 'Mailbox'
    Filter = 'Netscape Mailbox (no file extension)|*|All Files|*.*'
    Options = [ofOverwritePrompt, ofHideReadOnly, ofEnableSizing]
    Title = 'Export Netscape mailbox...'
    Left = 554
    Top = 92
  end
  object DlgExportEudora: TSaveDialog
    OnShow = DlgExportEudoraShow
    DefaultExt = 'mbx'
    FileName = 'Mailbox.mbx'
    Filter = 'Eudora Mailbox (*.mbx)|*.MBX|All Files|*.*'
    Options = [ofOverwritePrompt, ofHideReadOnly, ofEnableSizing]
    Title = 'Export Eudora mailbox...'
    Left = 554
    Top = 124
  end
  object DlgExportRFC822: TSaveDialog
    OnShow = DlgExportRFC822Show
    DefaultExt = 'txt'
    FileName = 'Mailbox.txt'
    Filter = 'RFC822 Mailbox (*.txt)|*.TXT|All Files|*.*'
    Options = [ofOverwritePrompt, ofHideReadOnly, ofEnableSizing]
    Title = 'Export RFC822 mailbox...'
    Left = 554
    Top = 156
  end
  object ISOList: TIStrings
    Duplicates = dupIgnore
    Left = 426
    Top = 104
    SStr = (
      'quot=34'
      'amp=38'
      'lt=60'
      'gt=62'
      'euro=128'
      'fnof=131'
      'hellip=133'
      'dagger=134'
      'Dagger=135'
      'permil=137'
      'Scaron=138'
      'lsqauo=139'
      'OElig=140'
      'lsquo=145'
      'rsquo=146'
      'ldquo=147'
      'rdquo=148'
      'bull=149'
      'ndash=150'
      'mdash=151'
      'oline=152'
      'trade=153'
      'scaron=154'
      'rsaquo=155'
      'oelig=156'
      'Yuml=159'
      'nbsp=160'
      'iexcl=161'
      'cent=162'
      'pound=163'
      'curren=164'
      'yen=165'
      'brvbar=166'
      'sect=167'
      'uml=168'
      'copy=169'
      'ordf=170'
      'laquo=171'
      'not=172'
      'shy=173'
      'reg=174'
      'macr=175'
      'deg=176'
      'plusmn=177'
      'sup2=178'
      'sup3=179'
      'acute=180'
      'micro=181'
      'para=182'
      'middot=183'
      'cedil=184'
      'sup1=185'
      'ordm=186'
      'raquo=187'
      'frac14=188'
      'frac12=189'
      'frac34=190'
      'iquest=191'
      'Agrave=192'
      'Aacute=193'
      'Acirc=194'
      'Atilde=195'
      'Auml=196'
      'Aring=197'
      'Aelig=198'
      'AElig=198'
      'Ccedil=199'
      'Egrave=200'
      'Eacute=201'
      'Ecirc=202'
      'Euml=203'
      'Igrave=204'
      'Iacute=205'
      'Icirc=206'
      'Iuml=207'
      'ETH=208'
      'Ntilde=209'
      'Ograve=210'
      'Oacute=211'
      'Ocirc=212'
      'Otilde=213'
      'Ouml=214'
      'times=215'
      'Oslash=216'
      'Ugrave=217'
      'Uacute=218'
      'Ucirc=219'
      'Uuml=220'
      'Yacute=221'
      'THORN=222'
      'szlig=223'
      'agrave=224'
      'aacute=225'
      'acirc=226'
      'atilde=227'
      'auml=228'
      'aring=229'
      'aelig=230'
      'ccedil=231'
      'egrave=232'
      'eacute=233'
      'ecirc=234'
      'euml=235'
      'igrave=236'
      'iacute=237'
      'icirc=238'
      'iuml=239'
      'eth=240'
      'ntilde=241'
      'ograve=242'
      'oacute=243'
      'ocirc=244'
      'otilde=245'
      'ouml=246'
      'divide=247'
      'oslash=248'
      'ugrave=249'
      'uacute=250'
      'ucirc=251'
      'uuml=252'
      'yacute=253'
      'thorn=254'
      'yuml=255')
  end
  object Crypt: TCryptLib
    Password = '012345'
    AddKey = 5408
    MultKey = 6933
    TerminateFiles = True
    IncludeHash = True
    Compression = none
    Left = 284
    Top = 85
  end
  object MsgGlob: TmsMessage
    ContentType = 'text/plain'
    Version = '2.02'
    ReturnReceipt = False
    Left = 309
    Top = 208
  end
  object PageSetupDlg: TPrinterSetupDialog
    Left = 284
    Top = 116
  end
  object PrintTemplate2: TIStrings
    Duplicates = dupIgnore
    Left = 461
    Top = 180
    SStr = (
      '<html>'
      '<body>'
      ''
      '<font size="-1" face="arial, helvetica"><b>From:</b></font>'
      '<font size="-1" face="arial, helvetica">'
      '%sender% <%from%>'
      '</font>'
      '<br>'
      ''
      '<font size="-1" face="arial, helvetica"><b>Subject:</b></font>'
      '<font size="-1" face="arial, helvetica">'
      '%header%:"Subject"'
      '</font>'
      '<br>'
      ''
      '<font size="-1" face="arial, helvetica"><b>Date:</b></font>'
      '<font size="-1" face="arial, helvetica">'
      '%sent%'
      '</font>'
      '<br>'
      ''
      '<font size="-1" face="arial, helvetica"><b>To:</b></font>'
      '<font size="-1" face="arial, helvetica">'
      '%to%'
      '</font>'
      '<br>'
      ''
      '<font size="-1" face="arial, helvetica"><b>CC:</b></font>'
      '<font size="-1" face="arial, helvetica">'
      '%cc%'
      '</font>'
      '<br>'
      ''
      '<font size="-1" face="arial, helvetica"><b>BCC:</b></font>'
      '<font size="-1" face="arial, helvetica">'
      '%header%:"X-Bcc"'
      '</font>'
      '<br>'
      '<hr>'
      '%body%'
      ''
      '<br>'
      '<br>'
      '%attachments%'
      '<br>'
      '</body>'
      '</html>')
  end
  object ControlStrip: TIStrings
    Duplicates = dupIgnore
    Left = 429
    Top = 211
  end
  object TimerRead: TTimer
    Enabled = False
    Interval = 2000
    OnTimer = TimerReadTimer
    Left = 314
    Top = 146
  end
  object CharSets: TIStrings
    Duplicates = dupIgnore
    Left = 462
    Top = 212
    SStr = (
      'US-ASCII=1'
      'ISO-8859-1=0'
      'ISO-8859-2=238'
      'ISO-8859-3=204'
      'ISO-8859-4=186'
      'ISO-8859-5=204'
      'ISO-8859-6=178'
      'ISO-8859-7=161'
      'ISO-8859-8=177'
      'ISO-8859-9=162'
      'ISO-8859-10=186'
      'ISO-8859-11=222'
      'ISO-8859-15=1252'
      'ISO-IR-111=204'
      'ISO-2022=204'
      'KOI-8=204'
      'KOI8-R=204'
      'KOI8-RU=204'
      'KOI8-UNIFIED=204'
      'CP1251=204'
      'WINDOWS-1250=238'
      'WINDOWS-1251=204'
      'WINDOWS-1252=1252'
      'WINDOWS-1253=161'
      'WINDOWS-1254=162'
      'WINDOWS-1257=186'
      'APPLE=77'
      'SHIFT-JIS=128'
      'ISO-2022-JP=128')
  end
  object TimerDisplay: TTimer
    Enabled = False
    Interval = 50
    OnTimer = TimerDisplayTimer
    Left = 344
    Top = 146
  end
  object TimerEvents: TTimer
    Enabled = False
    Interval = 250
    OnTimer = TimerEventsTimer
    Left = 254
    Top = 177
  end
end